DATA SEGMENT
DATA ENDS
STACK SEGMENT
STA DW 100 DUP (?)
TOP EQU LENGTH STA
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STACK,ES:DATA
START:MOV AX, DATA
MOV DS, AX
MOV ES, AX
MOV AX, STACK
MOV SS, AX
MOV SP, TOP
MOV DX, 0283H
MOV AL, 36H
OUT DX, AL
MOV DX, 0280H
MOV AX, 03E8H
OUT DX, AL
MOV AL, AH
OUT DX, AL
MOV DX, 0283H
MOV AL, 76H
OUT DX, AL
MOV DX, 0281H
MOV AX, 03E8H
OUT DX, AL
MOV AL, AH
OUT DX, AL
MOV AH, 4CH
INT 21H
CODE ENDS
END START